home *** CD-ROM | disk | FTP | other *** search
/ Games of Daze / Infomagic - Games of Daze (Summer 1995) (Disc 1 of 2).iso / x2ftp / msdos / source / units / joystick.tst < prev    next >
Encoding:
Text File  |  1992-07-02  |  235 b   |  14 lines

  1. PROGRAM JoystickTest;
  2.  
  3.  USES JoyStick;
  4.  
  5.  VAR
  6.    Knapp,Jvert,JHori:INTEGER;
  7.  
  8.  BEGIN
  9.    Initier2(10,10); Grenser(1,1,80,25); SettPos(40,12);
  10.    REPEAT
  11.      Knapp:=Stick2(JVert,JHori);
  12.      VisPos(20);
  13.    UNTIL Knapp=3;
  14.  END.